home *** CD-ROM | disk | FTP | other *** search
- echo off
- :start
- l-trea
- ask What is your desire [1-3]: @1234567Q
- IF ERRORLEVEL 8 GOTO Q
- IF ERRORLEVEL 7 GOTO 7
- IF ERRORLEVEL 6 GOTO 6
- IF ERRORLEVEL 5 GOTO 5
- IF ERRORLEVEL 4 GOTO 4
- IF ERRORLEVEL 3 GOTO 3
- IF ERRORLEVEL 2 GOTO 2
- IF ERRORLEVEL 1 GOTO 1
- :5
- cls
- cd\treasure\zzt
- cls
- echo * Summoning ZZT *
- zzt
- pause
- cls
- type \treasure\register.ans
- pause
- cls
- cd\treasure
- goto end
- :6
- cls
- cd\treasure\superzzt
- cls
- echo * Summoning Super ZZT *
- superz
- pause
- cls
- type \treasure\register.ans
- pause
- cls
- cd\treasure
- goto end
- :4
- cls
- type trouble.txt|more
- pause
- cls
- goto start
- :3
- cls
- type tdr-form.doc|more
- pause
- cls
- goto start
- :2
- cls
- type controls.doc|more
- pause
- cls
- goto start
- :1
- cls
- type treasure.doc|more
- pause
- cls
- goto start
- :q
- goto end
- :end
- echo * Returning Control to _DOS_ *
-